%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% Fonction d'assemblage du vecteur effort généralisé par patch
%
% Entr�es :
%
% sous-maillage : vecteur de coordonnées des noeuds du sous-maillage
% uh : [vecteur 4x1] extraction de la solution éléments finis
% epsilon : =1 sur le premier �l�ment du patch,
%           =-1 sur le deuxi�me �l�ment du patch,
%
% Sorties :
%
% ie : [matrice 4x4] matrice ie

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

function [ F ] = Assemblage_F_patch_fluxfree( Fe1,Fe2 )

n1=size(Fe1,1);
n2=size(Fe2,1);

F=zeros(n1+n2-2,1) ;

F(1:n1)=Fe1;
F(n1-1:n1+n2-2)=F(n1-1:n1+n2-2)+Fe2;

end

